﻿Imports System.Windows.Forms

Public Class FEditSourceFolderFilter

    Private mResult As Entities.Backup.FileFilter

    Public Shadows Function ShowDialog(ByVal owner As Form, ByVal filter As Entities.Backup.FileFilter) As Entities.Backup.FileFilter
        FileFilterControl1.SetFilter(filter)
        MyBase.ShowDialog(owner)
        Return mResult
    End Function

    Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
        mResult = FileFilterControl1.GetFilter
        Me.Close()
    End Sub
    Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
        Me.Close()
    End Sub

End Class
